MACD 5/MACD 5.bin/internet/irc_i_dodatki/kuang/kuangeleven28.lha/Rexx/Rin.amirx

Text File | 1996-12-30 | 5KB | 218 lines

/*                                                                            */
/*                        Random Insult Script 1.0                            */
/*           Stolen from "Slack" and rewritten by K. Stenström                */
/*                          ([e-mail])                               */
/*                                                                            */
/*        Slack is a script for ircII put together by Rev. Krusty             */
/*                        ([e-mail])                              */
/*                                                                            */
/* Fixed by Ariel to accept channel and number as arguments                   */
/*                  Part of Kuang Eleven v2 AmIRC distribution                */

options results

PARSE ARG nick channel rand .

IF nick = "" THEN DO
    "ECHO P=«RiN» Usage: RiN [NiCk] <ChANnEl> <NuM>"
    EXIT
END
IF channel = "" THEN DO
    "GETCHANNEL"
    channel=result
END
IF rand = "" THEN DO
    seed = Time(secs)
    rand = Random(0,29,seed)
END
    "SAY *** Random-Insult IN"rand" has been activated ***"

IF rand = 0 THEN DO
    "SAY - "nick" ... Here's a quarter... -"
    "SAY /kick "channel nick" <Invest in a Clue>"
    EXIT
END

IF rand = 1 THEN DO
      "SAY - "nick" ... You remind of a banana... -"
    "SAY /kick "channel nick" <So Split!!!>"
    EXIT
END

IF rand = 2 THEN DO
      "SAY - "nick" ... Your a Good Friend... -"
    "SAY /kick "channel nick" <But I Can't Stand Ya...> "
    EXIT
END

IF rand = 2 THEN DO
    "SAY - "nick" ... I'm Not-Surprised... -"
    "SAY - I think I'm Gonna have a    -"
    "SAY - Heart-attack and DIE from   -"
    "SAY - NOT-SURPRISE....            -"
    "SAY /kick "channel nick" <Nah...I'm Not!!!>"
    EXIT
END

IF rand = 4 THEN DO
    "SAY - "nick" ... Here's a Penny... -"
    "SAY /kick "channel nick" <Invest in a LIFE!>"
    EXIT
END

IF rand = 5 THEN DO
    "SAY - "nick" ... I'm Baked on acid and I'm having convulsions -"
    "SAY /kick "channel nick" <'Cause I keep seeing your face...>"
    EXIT
END

IF rand = 6 THEN DO
    "SAY - EEEEEEEKKKKK!!! A MUTANT-PSYCHO-HOSEBEAST -"
    "SAY /kick "channel nick" <MUTANT-PSYCHO-HOSEBEAST-KICK>"
    "SAY /topic --- MUTANT-PSYCHO-HOSEBEASTS : STAY-OUT!!! ---"
    EXIT
END

IF rand = 7 THEN DO
    "SAY - "nick" ... Your Kinda-Cool -"
    "SAY /kick "channel nick" <But, Fuck Off Anyways...>"
    EXIT
END

IF rand = 8 THEN DO
    "SAY - "nick" ... You Brainless-Monkey-Slut -"
    "SAY /kick "channel nick" <Go To Rent-a-Brain >"
    EXIT
END

IF rand = 9 THEN DO
    "SAY - "nick" ... You remind me of something -"
    "SAY /kick "channel nick" <A Spineless-Jelly-Dickwad>"
    EXIT
END

IF rand = 10 THEN DO
    "SAY - "nick" ... Here's a Shovel -"
    "SAY /kick "channel nick" <Go Bury yourself>"
    EXIT
END

IF rand = 11 THEN DO
    "SAY - What the hell is that smell -"
    "SAY /kick "channel nick" <Nevermind it's gone...>"
    EXIT
END

IF rand = 12 THEN DO
    "SAY - "nick" ... Whatever the fuck your on ... -"
    "SAY /kick "channel nick" <GET THE FUCK OFF OF IT!!!>"
    EXIT
END

IF rand = 13 THEN DO
    "SAY - "nick" ...This is kinda mean, but... -"
    "SAY /kick "channel nick" <I Don't Care!>"
    EXIT
END

IF rand = 14 THEN DO
    "SAY - "nick" ... Can I borrow your head... -"
    "SAY /kick "channel nick" <For my rock Garden>"
    EXIT
END

IF rand = 15 THEN DO
    "SAY - "nick" ... Is that your head??? or did  -"
    "SAY - someone discover a way to grow hair -"
    "SAY - on a Dildo??? :)                    -"
    "SAY /kick "channel nick" <You Procellin-Penis-From-Days-Gone-By>"
    EXIT
END

IF rand = 16 THEN DO
    "SAY - "nick" ... Your momma's so poor, that when I -"
    "SAY - saw her kicking a can down the street, I -"
    "SAY - said 'What are you doing?', she said     -"
    "SAY - 'MOVING!'.                               -"
    "SAY /kick "channel nick" <Prostitution doesn't pay well>"
    EXIT
END

IF rand = 17 THEN DO
    "SAY - "nick" ... You retarded-Monkey-Fuck... -"
    "SAY /kick "channel nick" <Fuck Off!!!>"
    EXIT
END

IF rand = 18 THEN DO
    "SAY - "nick" ... You Psycho-Slut from hell... -"
    "SAY /kick "channel nick" <Try a Dildo>"
    EXIT
END

IF rand = 19 THEN DO
    "SAY - "nick" ... You DitchPig... -"
    "SAY /kick "channel nick" <Your Fucking Ugly>"
    EXIT
END

IF rand = 20 THEN DO
    "SAY - "nick" ... You Dungeon-Slug... -"
    "SAY /kick "channel nick" <Greasy Grimy Boar>"
    EXIT
END

IF rand = 21 THEN DO
    "SAY - "nick" ... You Dirty-Whore... -"
    "SAY /kick "channel nick" <Try one guy at a time>"
    EXIT
END

IF rand = 22 THEN DO
    "SAY - "nick" ... You Filthy-Bitch... -"
    "SAY /kick "channel nick" <Ever hear the word "DOUCHE"???>"
    EXIT
END

IF rand = 23 THEN DO
    "SAY /kick "channel nick" <Yeah...And a mighty FUCK to you too...>"
    EXIT
END

IF rand = 24 THEN DO
    "SAY - "nick" ... Your so low... -"
    "SAY /kick "channel nick" <You lick the slime under the rocks>"
    EXIT
END

IF rand = 25 THEN DO
    "SAY - "nick" ... You filthy-Cock-Licker -"
    "SAY /kick "channel nick" <Go Lick a Scrodum>"
    EXIT
END

IF rand = 26 THEN DO
    "SAY - "nick" ... You filthy-Girly-Drink-Drunk -"
    "SAY /kick "channel nick" <Go Drink some Whiskey>"
    EXIT
END

IF rand = 27 THEN DO
    "SAY - "nick" ... Hear you live in the slums... -"
    "SAY /kick "channel nick" <Ask me if I care???>"
    EXIT
END

IF rand = 28 THEN DO
    "SAY - "nick" ... I hear you are Bi... -"
    "SAY /kick "channel nick" <When you want sex, you Buy...>"
    EXIT
END

IF rand = 29 THEN DO
    "SAY - "nick" ... I hear you failed Pre-School... -"
    "SAY /kick "channel nick" <Pay Someone to do your homework>"
    EXIT
END
EXIT